3 IFC=1THEN35
10 A=A+1:IFA=1THENLOAD"MPMLOADER",8,8
12 INPUT"[147]HINTERGRUND";A:POKE53281,A
13 INPUT"VORDERGRUND";A
14 PRINT"HANDELT ES SICH UM FARBBILDER (J/N)":POKE198,0:WAIT198,1:GETF$
15 INPUT"[147]DISKETTE MIT LORES-BILD. EINLEGEN";A$
16 POKE646,A
17 PRINT"[147]BITTE WARTEN"
18 FORT=55296TO55296+999:POKET,A:NEXT:T=0:D=1:DIM A$(100)
19 READ A$(D):D=D+1:IFA$(D-1)<>"*"THEN19
20 T=T+1:IFA$(T)="*"THENT=0:GOTO20
30 POKE252,4:POKE251,0:SYS828,A$(T):IFF$="J"THENC=1:C$=A$(T)+".":LOADC$,8,8
35 POKE198,0:WAIT198,1:GETA$
40 GOTO20
100 DATA COWBOY,ASTERIX,*